DEFINE BUFFER std FOR sct_det .
DEFINE BUFFER c06 FOR sct_det .
DEFINE BUFFER s06 FOR sct_det .

FOR EACH std WHERE std.sct_sim = "standard" AND std.sct_site = "500",
    EACH c06 WHERE c06.sct_sim = "2004-07C" AND c06.sct_site = "510" 
               AND c06.sct_part = std.sct_part,
    EACH s06 WHERE s06.sct_sim = "2004-07S" AND s06.sct_site = "500" 
           AND s06.sct_part = std.sct_part,
    EACH pt_mstr WHERE pt_part = std.sct_part AND pt_part BEGINS "P":
/*     IF std.sct_lbr_tl <> s06.sct_lbr_tl THEN */
    DISP std.sct_part 
         std.sct_lbr_tl LABEL "standard"
         c06.sct_lbr_tl LABEL "2004-07C"
         s06.sct_lbr_tl LABEL "2004-07S"
         pt_desc1.


END.



